function [ probabilita ] = selezione_a_roulette( vettore_delle_probabilita )
%SELEZIONE_A_ROULETTE Effettua la selezione a roulette di un valore del
%vettore in input

vettore_delle_probabilita=sort(vettore_delle_probabilita);

% Lo spin number viene scelto nell'intervallo
% [min(vettore_delle_probabilita) max(vettore_delle_probabilita)]

spin_number = vettore_delle_probabilita(1)+(vettore_delle_probabilita(end)-vettore_delle_probabilita(1))*rand(1,1);

probabilita = vettore_delle_probabilita(vettore_delle_probabilita(:)>spin_number); % si scelgono i valori superiori allo spin number
% e si seleziona obbligatoriamente il minore di questi valori

if isempty(probabilita) % non abbiamo trovato nemmeno un elemento
    probabilita = vettore_delle_probabilita(end);
else
    probabilita = probabilita(1);
end

end

